[VB6]文本方面的小问题？

来源：百度知道 编辑：UC知道 时间：2024/09/23 04:06:35
有一个内容是多行的Text1文本框，还有一个Label1框。
如何编一段程序，使得每1秒钟Label1的内容就会显示Text1文本框中的一行（且按行序每秒依次显示一行）？
拜托各位VB大虾们！

我给你说一下思路吧，没动力写代码了：
1.在窗体上放Text1,Label1,Timer1
2.把timer1.Interval设置为1000(1秒)
3.在timer1.timer里写个循环的代码来读取text1每行的值，赋给Label1.Caption属性来显示。
整个程序的关键在于如何读取文本框中的行，有两种方法：
一是找到文本的换行符来分隔。
二是用API：SendMessage

用数组，循环，取第二个“\“前的内容,再倒过来循环，取倒数第一个"\"后的内容显示，不用改实际内容。